R Notebook
a
cobb_douglas <-
function
(x, y, A, alpha) {
A
*
x
^
alpha
*
y
^
(
1
-
alpha)
}
test1